home *** CD-ROM | disk | FTP | other *** search
- ;Install script for CentreQuest
- ;$VER: 1.0
-
- FailAt 21
-
- Version >NIL: VERSION=39
- If WARN
- Copy CentreQuest.guide.WB2.icon T:CentreQuest.guide.info
- Else
- Copy CentreQuest.guide.WB3.icon T:CentreQuest.guide.info
- EndIf
-
- RequestFile >ENV:CQDir DRAWER="SYS:WBStartup" TITLE="Select CentreQuest program directory" DRAWERSONLY
- If WARN
- Skip Cleanup
- EndIf
- Copy >NIL: CentreQuest CentreQuest.info $CQDir
- If WARN
- SetENV CQError program
- Skip Error
- EndIf
-
- RequestFile >ENV:CQDir DRAWER=HELP: TITLE="Select CentreQuest guide directory" DRAWERSONLY
- If WARN
- Skip Cleanup
- EndIf
- Copy >NIL: CentreQuest.guide T:CentreQuest.guide.info $CQDir
- If WARN
- SetENV CQError guide
- Skip Error
- EndIf
-
- RequestFile >ENV:CQDir DRAWER="SYS:WBStartup" TITLE="Select TestRequest program directory" DRAWERSONLY
- If WARN
- Skip Cleanup
- EndIf
- Copy >NIL: TestRequest TestRequest.info $CQDir
- If WARN
- SetENV CQError TestRequest
- Skip Error
- EndIf
-
- Lab Cleanup
- UnSetENV CQDir
- Delete T:CentreQuest.guide.info QUIET
- Quit
-
- Lab Error
- If EXISTS C:RequestChoice
- RequestChoice >NIL: TITLE="CentreQuest Installer" BODY="Error copying $CQError" GADGETS="Exit"
- Else
- Echo "Error copying $CQError" TO "CON:////CentreQuest Installer/CLOSE/NOSIZE/WAIT"
- EndIf
- UnSetENV CQError
- Skip Cleanup BACK
-